home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
grabtext.arc
/
TEXTSHOW.BAT
< prev
next >
Wrap
DOS Batch File
|
1990-08-28
|
2KB
|
88 lines
@echo off
GOTO START
By Bill Buckels 1990
PTX GRAPHICS
with the exception of the sdn logon screen
this could be an outline for an Adventure Game Batch Interpreter
the Batch Driver is called TEXTVU.EXE
TEXTVU waits for a key press and returns a DOS errorlevel which is
used for the logical BRANCHING in the Batch file.
Remember that since the ascii code is returned
The number 1 is read as 49 (its ascii value).
Anyhow, here goes.. Bunch of TEXT GRAPHICS
:START
CLS
REM if its above numerical 3 then it goes for another pass
REM the eval is from large to small
TEXTVU DOOR.PTX
IF ERRORLEVEL 52 GOTO START
IF ERRORLEVEL 51 GOTO ENDER
IF ERRORLEVEL 50 GOTO SECOND
IF ERRORLEVEL 49 GOTO FIRST
GOTO START
we are using textvu as a slideshow in this next group
:SECOND
CLS
TEXTVU KEYBORED.PTX
CLS
TEXTVU SPACEBAR.PTX
CLS
TEXTVU SOUP.PTX
GOTO START
the next example uses a convoluted jump loop
reminiscent of spaghetti
:FIRST
CLS
TEXTVU HAL.PTX
:TOP1
CLS
TEXTVU HAROLD.PTX
:NEXT1
CLS
TEXTVU DINER.PTX
:LAST1
CLS
TEXTVU TREK.PTX
:RECURSION
CLS
TEXTVU DOORS1.PTX
IF ERRORLEVEL 54 GOTO RECURSION
IF ERRORLEVEL 53 GOTO START
IF ERRORLEVEL 52 GOTO LAST1
IF ERRORLEVEL 51 GOTO NEXT1
IF ERRORLEVEL 50 GOTO TOP1
IF ERRORLEVEL 49 GOTO FIRST
GOTO RECURSION
GOTO START
textvu is once again used as a slideshow
:ENDER
CLS
TEXTVU GEORGE.PTX
CLS
TEXTVU MSW.PTX
CLS
TEXTVU SDNLOGON.BSV
CLS
TEXTVU FAREWELL.PTX
REM return control to the parent process
CLS